#include<iostream>
#include<string>
using namespace std;
int main(){
    string words, longest, real;
    int w_count,w_len,lat,done1,done2, smal, done3,done4,defis,m_len,a,b;
    char z = ' ';
    getline(cin,words);
    words+=' ';
    for(int z=0;z<words.size();++z){
        if(done1 == 0 and ((words[z]>='a' and words[z]<='z') or (words[z]>='A' and words[z]<='z'))){
            ++lat;
            done1=1;
        }
        if(w_len<=3 and done2==0){
            ++smal;
            done2=1;
        }
        if(w_len>3 and done3==0){
            --smal;
            done3=1;
        }
        if(words[z]=='-' and done4==0){
            ++defis;
            done4=1;
        }
        if(m_len<w_len){
            m_len=w_len;
            a=0;
            longest="";
        }
        ++w_len;
        if(words[z]==' '){
            ++w_count;
            done1=0;
            done2=0;
            done3=0;
            done4=0;
            while(m_len==w_len-1){
                longest += words[z-a];
                ++a;
                if(a==w_len){
                    break;
                }
            }
            w_len=0;
        }
    }
    while(real.size()<longest.size()){
        real+=longest[longest.size()-b];
        ++b;
    }
    if(w_count == 1){
        cout<<"Мало данных для анализа";
    }
    else{
        cout<<"Кол-во слов: " << w_count << endl;
        cout<<"Кол-во слов содержащих латинский символ: " << lat << endl;
        cout<<"Кол-во слов не превышающих 3 символа: " << smal << endl;
        cout<<"Кол-во слов в составе которых имеется дефис: " << defis<< endl << endl;
        cout<<"Самое длинное слово: "<< real<<endl;
        cout<<"Длина слова: " << m_len;
    }
}
